﻿Imports System.Data.SqlClient
Public Class DatabaseProvider
    Public Shared Function ConnectionData() As SqlConnection
        Dim ConnectionString As String = "Data Source=.;Initial Catalog=QLNS;Integrated Security=True"
        Dim Connect As New SqlConnection(ConnectionString)
        Connect.Open()
        Return Connect
    End Function

End Class
